home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_pyr_hidepitthings.cog < prev    next >
Text File  |  1999-11-15  |  1KB  |  58 lines
  1. # Jones 3D Cog Script
  2. #
  3. # pyr_hidepitthings.cog
  4. #    
  5. # Hide non-actor, untagged stuff in a given sector
  6. #
  7. # [RKD]
  8. #
  9. # (C) 1998 LucasArts Entertainment Company LLC. All Rights Reserved
  10. # ========================================================================================
  11.  
  12. symbols
  13. message user1
  14. message    user2
  15. message    entered
  16.  
  17. sector    hidesector    linkid=3
  18.  
  19. thing    donthideme    nolink
  20. thing    donthideme2    nolink
  21.  
  22. int        curthing=0        local    
  23. end
  24.  
  25. code
  26. entered:
  27. user1:
  28.     curthing = FirstThingInSector(hidesector);
  29.     
  30.     while (curthing != -1)
  31.     {
  32.         if ((GetThingType(curthing) == 7) && (curthing != donthideme) && (curthing != donthideme2))
  33.         {
  34.             ClearThingFlags(curthing, 0x10);
  35.         }
  36.  
  37.         curthing = NextThingInSector(curthing);
  38.     }
  39.     
  40.     return;
  41.  
  42. user2:
  43.     curthing = FirstThingInSector(hidesector);
  44.     
  45.     while (curthing != -1)
  46.     {
  47.         if ((GetThingType(curthing) == 7) && (curthing != donthideme) && (curthing != donthideme2))
  48.         {
  49.             SetThingFlags(curthing, 0x10);
  50.         }
  51.         
  52.         curthing = NextThingInSector(curthing);
  53.     }
  54.  
  55.     return;
  56.  
  57. end
  58.